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-TITLE $YSEXIT [MAGE EXIT SYSTEM SERVICE 
7 “Toent *VO4ed00! 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION,» MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


* 

& * 
a ® 
® ® 
~ ® 
* OFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
« N ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®* 
‘ ION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
, THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
* PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY ®* 
* TRANSFERRED. . 
® 

* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE ®* 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. . 
* ® 
® ay 
® ® 
a x 
® ® 
:* ® 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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;++ 
; FACILITY: EXECUTIVE, SYSTEM SERVICES 


ABSTRACT: 
; syeentt IT IMPLEMENTS THE EXIT SYSTEM +4 


CE AND PERFORMS THE DISPATCHING 
EXIT HANDLERS AND DELETES THE PROC I 


VI 
SS IF NONE EXIST. 


; ENVIRONMENT: 
; MODE=KERNEL, PAGED CODE 


: AUTHOR: R. HUSTVEDT CREATION DATE: 30-SEP-76 
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; MODIFIED BY: 


v03-002 ,sK02e? wrence J. Kena 26-Jun-1984 
not call mevatant tos adore forever. Only call a number 
i to the number that have actually been declared. 


v03-001 LJK0249 Lawrence J. Kenah 31-Aug-1983 
If SDELPRC somehow returns control to this poutine, lower 
scheduling priority to zero before entering loop. 


SOSSSCOSOSSCOSSSSSSSSSSOSSSOSOSSSOSOSCSOSOOSOSOSOOSOSOOSSOSoO 


SOOO COSOOOOOOSOOOSOSSOOSSSOSOSOSOSOOSOOSOOOSOSOOSOOOOOSOOOOOOSOOoOO 


DWONANE WIN 9 OONAUE WIN (= OO ONAN EWN $$ 9 OONOAUE UO " OOONOW 


PRP RREL LS PUWWWWIWINININIUNNONONononononononongn 2 2 2 


SooooooooSo 


Sooooooo 


S< 


N 6 
SYSEXIT IMAGE EXIT SYSTEM SERVICE SEP~1984 :50 VAX/VMS © V04-00 Pa 
yont000 DECLARATIONS Mer See robe BSi83i39 FANEMES Sacco ¥O4u0O a 
.SBTTL DECLARATIONS 
4 ; INCLUDE FILES: 
$ SPCBDEF ; DEFINE PROCESS CONTROL BLOCK 
: SPSLDEF : DEFINE PSL FIELDS AND BITS 
; EQUATES: 
00000004 es t tope=4 : DISPLACEMENT TO EXIT CODE 
8 65 ; OWN STORAGE: 
000 ge 
00000000 ~=« 468 .PSECT YEXEPAGED, BYTE : PAGED PSECT 


SYSEXIT 1 
v04-000 E 
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ea 
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-SBTTL EXESEXIT = IMAGE EXIT SYSTEM SERVICE 


: FUNCTIONA DESCRIPTION: 
EXIT IMPLEMENTS THE IMAGE EXIT SYSTEM SERVICE. THE LIST 
TERMINATION CONTROL BLOCKS FOR BOTH USER AND SUPER ACCESS 
Routines: PROCESSED, CALLING THE SPECIFIED TERMINATION HANDLING 


CALLING SEQUENCE: 
CALLG ARGLIST,EXESEXIT 


INPUT PARAMETERS: 
CODE(AP) = TERMINATION REASON CODE 


R4 = CURRENT PROCESS PCB ADDRESS. 


IMPLICIT INPUTS: 
CTLSGL_THUSER - HEAD OF THE USER MODE TERMINATION CONTROL BLOCK LIST 
CTLSGL~ THSUPR = HEAD OF THE SUPER MODE TERMINATION CONTROL BLOCK LIST 


OUTPUT PARAMETERS: 
NONE 

COMPLETION CODES: 
NONE 


SIDE EFFECTS: 
NONE 
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1 
! = ee 
0010 1 -ENTRY EXESEXIT,“M<R4> 
00000000'9F 04 AC DO 1 OVL  CODECAP) aPCTLSGL FINALSTS ; SET FINAL EXIT STATUS 
00 24 a4 O02 €5 OOOA 1 BBCC #PCBSV_FORCPEN,PCBSL_ STS(R4),5$ ; CLEAR FORCE EXIT PENDING 
51 DC OOOF 106 5$: MOVPSL R1 GET Eun PSL” 

51 51 02 16 EF 0011 1 EXTZV #PSL$V_PRVMOD, #PSLSS _PRVMOD R1,R1 EXTRACT PREVIOUS MODE 
00000000'9F DF 001 1 PUSHAL SeCTL SCL _THCOUN : GET ADDRESS F’ HANDLER COUNT CELL 
FFFFFFFC'SF DF OO1C 1 PUSHAL a@#C1i$GL— THSUPR es ; GET ADDRESS OF TERMINATION CHAIN 

1051 F4 110 108: BGEG R1,3U$ : TRY SUPER MODE IF NONE FOR USER 
111 SDELPRC_S : DEL ETE SELF 
0 1 ‘ ETPRI-§ PRI=#0 : MAKE NEXT LOOP HARMLESS 
fet ; ; 20$: BRB 0$ t seeee® FELL THROUGH DELPRC SOMEHOW 
50 00 BE41 09 41 115 30$: MOVL a(SP)CR1),RO ; GET HEAD OF TERMINATION LIST 
461 é BEQL 108 : NONE FOR THIS MODE, TRY ANOTHER 
9641 D4 0048 1 CLRL a(SP)+CR1) : ZAP TERMINATION LIST POINTER 
54 00 BE4! DO 0048 1 : MOVL a (SP)CR1I,R4 : TUCK AWAY COUNT IN SAFE PLACE 
£41 D4 0050 1 CLRL a(SP)+CR14 : CLEAR REAL COUNT CELL 
51 06 0053 120 INCL R1 CORRECT MODE NUMBER 
51 05 ¢& 0055 121 MULL #<14<1a<PSLSV_ CURMOD-PSLSV PRVMOD>> MAKE PRV=CURRENT 
5D OC AD OD 58 : MOVL  12(FP),FP ; RESTORE Chaney AERAME POINTER 
SE 8° ¢ 3 1 ADDL ira. Favh CMSTKSZ>,SP ; CLEAN KERN 
7E 6 124 ASHL  #PSL$V_PRVMOD,R1,-(SP) : PUSH PSL 
51° 04 AC OD 63 125 MOVL CODECAP),R : SET CODE IN R1 
=. ¥ 6? 126 BSBB = DOREI + PUSH PC AND DO RE! 


SYSEXIT IMAGE EXIT SYSTEM SERV 
yonc0b0 egexat = IMAGE EXIT 
é 127 
128 ; 
1 ; 
6 1 3 
131 ; 
132 ; 
. 153 
134 ; 
69 135 
54 DD 6 1 § 
54 14 AD dO 1 
51 DD F 1 8 40$: 
of DD 1 
2 D4 7 140 
0c BO 1 dO 7 141 
04 BO 08 ag FA 79 196 
Be Be ie 
G3 33 oe 148 
E8 6E f 084 138 
it 14 
SE 4 CO 0087 148 50$: 
D D4 O8A 149 
08c 150 
095 13) 
095 «1 § 
Baas 153 ; 
095 154; 
Bn88 155 ; 
02 0095 156 boREI: 
0096 =6157 
0096 158 
0096 159 


ICE 16-SEP-1984 02:05:50 VAX/VMS Macro v04-00 Page 4 SYS 
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TERMINATION LIST PROCESSING 

RO = POINTER TO TERMINATION CONTROL BLOCK LIST 

Ri = TERMINATION CODE/REASON 

R4 = COUNT OF TERMINATION HANDLER CONTROL BLOCKS 

PUSHL R4 : SAVE COUNT ON THE STACK 

OVL 5*4(FP),R4 : RESTORE CONTENTS OF R4 

PUSHL 1 : SAVE CODE 

PUSHL (RO) : SAVE POINTER TO NEXT BLOCK 

CLRL. (RO) : ZAP FLINK TO PREVENT CIRCULAR LIST 

OVL R1,a12(RO) + SET TERMINATION CODE/REASON 

CALLG 8(RO),a@4(RO) + CALL TERMINATION HANDLER 

POPR #*m<RO,R1> : RESTORE CODE AND POINTER 

TSTL RO : MORE TERMINATION BLOCKS? 

BEQL 508 + NO, ALL DONE 

SOBGTR (SP),40$ + KEEP GOING ONLY IF NONZERO LOOP COUNT 

ADDL #4,SP ; REMOVE COUNT CELL FROM STACK 

CLRL oF : TERMINATE CALL FRAME LIS1 

SEXIT_S R1 : OTHERWISE EXIT AGAIN 


PERFORM REI TO ENTER USER OR SUPER MODE AS APPROPRIATE 
REI ; ENTER PROPER MODE FOR TERMINATION 


- END 


SYS 
v04 
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Symbol table iets Ti 6:9 sii USYS.SRCISYSEXIT.MAR;1 - a) 
COD = 00000004 
CTLSGL_F INALSTS eeeereee xX 
CTL$GL_THCOUNT eteeeeee 8X 
CTLSGL_THSUPR eeeereee =X 
DORE! 00000095 R 
EXESC CMSTKSZ eteeeere =X 
EXESERIT 00 i RG 
PCBSL_STS = 
PCBSV_FORCPEN = 
PSL$S_PRVMOD = 
PSL$V_CURMOD = 
PSL$V_PRVMOD = 1 
SYSSDELPRC eeeveree GX a3 
SYSSEXIT ekeeeeee GX 
SYSSSETPRI teeneeeer GX 0 
meee en eee re ceore + 
! ;_Psect synopsis ! 

PSECT name Allocation PSECT No. Attributes 

ABS 454444544 : 8 NOPIC USR CON ABS LCL at NOEXE NORD a NOVEC BYTE 

S$ 000 0.) oF 9} NOPIC USR CON ABS LCL NOSHR’~ EXE RD WRT NOVEC BYTE 
YEXEPAGED So09n0%9% 150.) 2¢ 2.) NOPIC USR CON REL LCL NOSHR- EXE RD WRT NOVEC BYTE 

auesueseeuseneseecuceces} 
H ; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 9 00 = 00 300-07 00:00:00.88 
zeunane processing 128 Ba: 8: 2:19 88380 93°95 
Symbol table sort p 0; 0: “41 00:00:00: 58 
4 00: 8: 0.55 00:00: 5°48 

Symbol table output 3 0:00: B3 0:00:00.09 
Psect synopsis output 1 0: 8: . es Bs 
Cross-reference output 8 0:00: OY 0:00: 9-09 
Assembler run totals 36 0:00:03.6 0:00:22.1 


The yorting (33 Limit was 1950 pages. 
11193, eytes, (22 pages) of virtual memory were used to buffer the intermediate gode 
There were 10 pages of symbol table space allocated to hold 181 non-local and § 


local symbols. 
9 source Ht A were read in Pass 1, producing object records in Pass 


13 pages of virtual memory were used to define 12 macros. 
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! Macro Library statistics ! 


teow new mnaernn encase re rocneann $ 


Macro Library name Macros defined 
-8255SDUA SYS.OBJJLIB.MLB;1 1 
Hatten a38:; SYS 98 STARLET .MLB;2 8 
Toraieet (all Libraries) 


260 GETS were required to define 9 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:SYSEXIT/OBJ=OBJ$:SYSEXIT MSRC$:SYSEXIT/UPDATE=(ENHS$S:SYSEXIT)+EXECML$/LIB 
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